DECUS fYogram Library Write-up 


DECUS NO. 8-578 


CHROMATICITY DIAGRAM 


Abstract 

From 40 measured data of the spectral transmittance of a material, the program computes 
and prints the coordinates in the chromaticity diagram and the transmittance for the co¬ 
lour temperatures 2854°K (C.I.E. standard source A) and for 2360°K. 

Description 


The measured data of the spectral transmittance l a for the 40 wavelengths 380, 390, .... 
770nm are typed. The following equations are used to compute the transmittance T and 
the coordinates of the chromaticity diagram: 

Tristimulus values: 

X = I t* • Jp 

Y = I U • yP 

2 - E T I ' SP 

spectral transmittance 

tristimulus computation data accor¬ 
ding to table 10 and 11 

transmittance 


lA = 
xP, yP, IP = 

Y = 7 = 









Coordinates in the chromaticity diagram: 

X 


x 


y = 


X + Y + Z 


Y 

X + Y + Z 


z = 


X + Y + Z 


The values of x, y, z and l r - Y are printed. If the data are measured as absolute values 
(O.xxx) the total transmittance is 10^, if they are measured in percentage, the total trans¬ 
mittance is lCh 7 . ( 

Before a measured data is typed the computer always prints the v/avelength which the 
data belongs to. This way the input can be easily controlled. After all 40 data are typed, 
any one of them can be easily corrected. Typing the wavelength followed by the correct 
data, automatically replaces the previously typed data at this particular wavelength. 

If the tristimulus computation data for colour temperatures different from 2854°K and 
2360°K are to be used according to the enclosed tables, the numbers stored in locations 
1520 - 2267 (1st table) and/or 2270 - 3037 (2nd table) have to be changed. This can be 
done most easily with the program "Decimal to Floating Point Conversion (DECUS NO. 
8-580 In one program run the computation is 

always executed for exactly two colour temperatures. 


The program runs together with floating point package 1. DEC 08 - YQ1B - PB 4/17/70. 


Storage requirements 

0-37 
63 - 75 

101 - 1137 

1330 - 1517 (Wavelenghts) 

1520 - 2267 (Table 1) 

2270 - 3037 (Table 2) In addition, the floating point package 1 must be in core. 
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N\;» vo¬ 
lt Mplh 

(m/) 


C .M.. standard Source A 
(lMunck 2854 \ c --- 1.418' 
xP yP /P 


380 

390 


6 

23 


400 

410 

420 

430 

440 


19 

7! 

262 

644 

926 


1 93 

2 340 

8 1256 

27 3167 

61 4647 


450 

460 

470 

480 

490 


1031 

117 

5435 

1019 

210 

5851 

-776 

362 

5116 

428 

622 

3636 

160 

1039 

2324 


500 

27 

1792 

1509 

510 

57 

3050 

969 

520 

425 

4771 

52S 

530 

1214 

6322 

309 

540 

2313 

7603 

162 

550 

3732 

8568 

75 

560 

5510 

9222 

36 

570 

7571 

9457 

21 

5P0 

9719 

9228 

18 

590 

11579 

8510 

12 

600 

12704 

7547 

10 

610 

1266V 

6356 

4 

62 d 

11373 

5071 

3 

; 63G 

8980 

3704 

640 

6558 

2562 


650 

% 4336 

1637 


660 

2628 

V72 


670 

1448 

530 


680 

804 

292 


690 

404 

146 


700 

209 

75 


710 

110 

40 


720 

57 

19 


739 

28 

10 


: 740 

14 

6 


750 

6 

2 


760 

4 

2 


770 

2 



D1AI.S 

109828 

100000 

35547 


X-OAAKy y —0. 

4075 


\ \\ ]. 

F. 1 ft 

>ala for 

Stand .m 


—~“-~ 

CM.li. 

standard 

XP 

yp 

3 


13 


56 

2 

217 

6 

812 

24 

1983 

81 

2689 

178 

2744 

310 

2454 

506 

1718 

800 

870 

1265 

295 

1918 

44 

2908 

81 

4360 

541 

6072 

1458 

7594 

2689 

8834 

4183 

9603 

5840 

9774 

7472 

9334 

8841 

8396 

9/28 

7176 

9948 

5909 

9436 

4734 

8140 

3630 

6200 

2558 

4374 

1709 

2815 

1062 

1655 

612 

876 

321 * 

465 

169 

220 

80 

108 

39 

53 

19 

26 

9 

12 

4 

6 

2 

2 

1 

2 

1 


14 

60 

268 

1033 

3899 

9678 

13489 

14462 

14085 

11319 

7396 

4290 

2449 

1371 

669 

372 

188 

84 

38 

16 

10 

7 

3 

2 


I 

99072 100000 85223 

x = 0.3485 y *=0.3518 


6 .U.. 19 . 11 ) 


C .I.F:. standard Source C 
xP yP 7l> 


4 


20 

19 


89 

85 

2 

404 

329 

9 

1570 

1238 

37 

5949 

**997 

122 

14628 

3975 

262 

19938 

3U | S 

443 

20638 

3362 

694 

19299 

221^ 

1058 

14972 

1112 

1618 

9461 

363 

2358 

5274 

52 

3401 

2864 

89 

4833 

1520 

576 

6462 

712 

1523 

7934 

388 

2785 

9149 

195 

4282 

9842 

86 

5 8 SO 

9841 

39 

7322 

9147 

20 

8417 

7992 

16 

8984 

6627 

10 

8949 

5316 

7 

8325 

4176 

*> 

7070 

3153 

2 

5309 

2190 


3693 

1443 


2349 

886 


1361 

504 


708 

259 


369 

134 


171 

62 


82 

29 


39 

14 


19 

6 


8 

3 


4 

2 



2 1 
1 1 
1 


98041 100000 118103 

x = 0,3101 y = 0.3163 
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x= 0.6524 y= 0.3448 x- 0.5852 
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Tristivniihis Computation Data for IManckian Radiator*' 



























Instructions 
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Example 


WAVE- DATA 
LENGTH 


380 

0 

390 

0 

400 

0.9 

410 

0.9 

420 

1 

4 30 

0.5 

440 

0.6 

450 

0.6 

460 

0.3 

470 

0.6 

480 

0.8 

490 

1 .5 

500 

4.5 

510 

10.1 - 

520 

1 6 , 

530 

8 22.5 

540 

27 

550 

30.6 

560 

33 

570 

34.8 

580 

37 

590 

40.2 

600 

4 3.1 

610 

45.6 

620 

47 . 

630 

48.7 

640 

50.2 

650 

52.1 

660 

54.9 

670 

57.8 

680 

61.2 

690 

65.2 

700 

69.2 

710 

69.5 

720 

70 

730 

70 

740 

70 

759 

70 

7 60 

70 

7 70 

70 
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CORRECTION: 
520 16.8 

CORRECTION: 

0N 


COORDINATES: 2854 DEG. K 

X = +0.562125E+03 

Y = +0.429912E+00 

Z = +0.796337R-02 

TAU = +0.341941E+07 



2360 DEG. K 

+0.5V9223E+00 
+0.415026E+00 
+ 0.5 75144E-02 

+0.357265E+07 
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PROGRAM 


LIBRARY 


DECUS NO. 


TITLE 


AUTHOR 


COMPANY 


DATE 


SOURCE LANGUAGE 


8-578 

CHROMATICITY DIAGRAM 

R. Jacot 

Integra A. G. 

Wallisellen, Switzerland 

Septembers, 1973 

PAL III 


ATTENTION 

This is a USER program. Other than requiring that it conform to submittal and review standards, 
no quality control has been imposed upon this program by DECUS. 

The DECUS Program Library is a clearing house only; it does not generate or test programs. No 
warranty, express or implied, is made by the contributor. Digital Equipment Computer Users 
Society or Digital Equipment Corporation as to the accuracy or functioning of the program or 
related material, and no responsibility is assumed by these parties in connection therewith. 










